Primero, crearemos un vector con cada uno de los nombres de la personas y los datos de la latitus y longitud del lugar de la República Mexicana al que les gustaría viajar. Posteriormente, mediante la función rbind crearemos una matriz por columnas con los datos de las ubicaciones a las que nos gustaría viajar:
Uriel<-c(-92.6367,16.7376)
Santiago<-c(-87.466,20.212)
Sebastian<-c(-106.4531,23.2420)
Emilio<-c(-86.8465,21.1742)
Anahi<-c(-74.2973,4.5708)
viajes<-rbind(Uriel, Santiago, Sebastian, Emilio, Anahi)
viajes
## [,1] [,2]
## Uriel -92.6367 16.7376
## Santiago -87.4660 20.2120
## Sebastian -106.4531 23.2420
## Emilio -86.8465 21.1742
## Anahi -74.2973 4.5708
Una vez que hemos creado nuestra matriz de datos, cambiaremos el nombre de nuestras columnas con la función colnames:
colnames(viajes)<-c("Longitud","Latitud")
viajes
## Longitud Latitud
## Uriel -92.6367 16.7376
## Santiago -87.4660 20.2120
## Sebastian -106.4531 23.2420
## Emilio -86.8465 21.1742
## Anahi -74.2973 4.5708
Recuerda que para hacer gráficas con ggplot y mapas con qmplot necesitamos un data frame. Vamos a transformar nuestra matriz en un data.frame de la siguiente forma:
viajes<-data.frame(viajes)
viajes
## Longitud Latitud
## Uriel -92.6367 16.7376
## Santiago -87.4660 20.2120
## Sebastian -106.4531 23.2420
## Emilio -86.8465 21.1742
## Anahi -74.2973 4.5708
Podemos crear una grafica de dispersión y usar los nombres como etiqueta si utilizamos la función ggplot junto con geom_text; además, podemos agregar puntos a nuestra gráfica con la función geom_point. Finalmente, si queremos que nuestra gráfica sea interactiva, utilizamos la función ggplotly:
dispersion<-ggplot(viajes)+geom_text(aes(Latitud,Longitud),label= rownames(viajes))+geom_point(aes(Latitud,Longitud),color= rainbow(5))
ggplotly(dispersion)
Para crear un mapa, utilizaremos la funcion qmplot:
qmplot(Longitud, Latitud, data=viajes, color=I(rainbow(5)))
Podemos agregar el parámetro geom = c("point","density2d") para hacer un mapa de puntos y densidad:
qmplot(Longitud, Latitud, data=viajes, geom=c("point","density2d"))
A excepcion de Anahii y Sebstian, tanto Santiago, Emilio y Uriel se encuentran mas cerca
Una funcion racional
SI, porque se puede determinar el tamaño de la poblacion y considerar si es un potencial agente economico, y analizar que tipos de acividades economicas se desarrollan en dicha region
Lo basico de programacion, a utilizar la plataforma “R” para realizar diversas actividades, asi como el uso de herramientas de analisis de datos y la importancia de estos
Esta obra fue generada mediante R en November 18, 2020 y forma parte de las actividades realizadas en las materias de Matemáticas I y Taller III, Facultad de Economía, UNAM. Esta obra está bajo una licencia de Creative Commons Reconocimiento-NoComercial-CompartirIgual 4.0 Internacional. Creative Commons (CC).